unit DataModule_Cliente;

interface

uses
  System.SysUtils, System.Classes, FireDAC.Stan.Intf, FireDAC.Stan.Option,
  FireDAC.Stan.Param, FireDAC.Stan.Error, FireDAC.DatS, FireDAC.Phys.Intf,
  FireDAC.DApt.Intf, FireDAC.Stan.Async, FireDAC.DApt, Datasnap.DBClient,
  Datasnap.Provider, Data.DB, FireDAC.Comp.DataSet, FireDAC.Comp.Client,
  Data.FMTBcd, Data.SqlExpr;

type
  TDM_Cliente = class(TDataModule)
    DSPCliente: TDataSetProvider;
    CDSCliente: TClientDataSet;
    CDSClienteID_CLIENTE: TIntegerField;
    CDSClienteNOME: TStringField;
    CDSClienteCPF: TStringField;
    CDSClienteENDERECO: TStringField;
    CDSClienteNUMERO: TStringField;
    CDSClienteCOMPLEMENTO: TStringField;
    CDSClienteBAIRRO: TStringField;
    CDSClienteCIDADE: TStringField;
    CDSClienteCEP: TStringField;
    CDSClienteTELEFONE1: TStringField;
    CDSClienteCELULAR: TStringField;
    CDSClienteTELEFONE2: TStringField;
    CDSClienteEMAIL: TStringField;
    CDSClienteANIVERSARIO: TStringField;
    CDSClienteUF: TStringField;
    DSCliente: TDataSource;
    CDSClienteATIVO: TIntegerField;
    SQLCliente: TSQLDataSet;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DM_Cliente: TDM_Cliente;

implementation

{%CLASSGROUP 'Vcl.Controls.TControl'}

uses DataModule_Conexao;

{$R *.dfm}

end.
